home *** CD-ROM | disk | FTP | other *** search
/ Canadian Geographic Explorer / Canadian Geographic Explorer.iso / pc / riddler.dxr / 00025_Enter Name 3 looper script.ls < prev    next >
Encoding:
Text File  |  1996-10-03  |  469 b   |  15 lines
  1. on exitFrame
  2.   global gVoiceChannel, gPathToSound, fileDelimiter
  3.   if the keyPressed = RETURN then
  4.     if the text of field "player name" <> EMPTY then
  5.       sound playFile gVoiceChannel, gPathToSound & "signup" & fileDelimiter & "mock3.aif"
  6.       Capitalize("player name")
  7.       set the text of field "name3" to the text of field "player name"
  8.       repeat while soundBusy(gVoiceChannel)
  9.       end repeat
  10.       go("Key Assign")
  11.     end if
  12.   end if
  13.   go(the frame)
  14. end
  15.